From: Richard M. Stallman <rms@gnu.org>
Date: Mon, 13 Oct 2003 18:45:03 +0000 (+0000)
Subject: (lisp_align_malloc): If BASE is 0, call memory_full.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~25217
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=a7d9957353d08d7918def565d023dac3b76bb0ca;p=emacs.git

(lisp_align_malloc): If BASE is 0, call memory_full.
---

diff --git a/src/alloc.c b/src/alloc.c
index 56a4c0b6ca0..a001413cb52 100644
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -756,6 +756,11 @@ lisp_align_malloc (nbytes, type)
 #else
       base = malloc (ABLOCKS_BYTES);
       abase = ALIGN (base, BLOCK_ALIGN);
+      if (base == 0)
+	{
+	  UNBLOCK_INPUT;
+	  memory_full ();
+	}
 #endif
 
       aligned = (base == abase);